'==================================================================================================
'	Author		David Segura
'	URL			http://winpeguy.com/
'	Source		http://winpe.codeplex.com/
'	Version		20130910
'==================================================================================================
'	Purpose:
'	System Tools Section
'==================================================================================================
'	File Locations in Windows:
'	%DeployRoot%\Boot\+WinPE\Menu\Scripts\SystemTools.vbs
'==================================================================================================
'	File Location in WinPE:
'	X:\Menu\Scripts\SystemTools.vbs
'==================================================================================================
'	Configuration:
'	None.  Editing this file is not recommended
'==================================================================================================
'	Change Log:
'	20130910	Codeplex Beta
'==================================================================================================
	Sub subTaskManager
		If objFSO.FileExists(envSystem32 & "\taskmgr.exe") Then
			sCmd = envSystem32 & "\taskmgr.exe"
			objShell.Run sCmd
		Else
			MsgBox "Cannot find " & envSystem32 & "\taskmgr.exe" & vbCrLf & "" & vbCrLf & _
			"Task Manager may not be installed",16,MsgBoxTitle
		End If
	End Sub
'==================================================================================================
	Sub subMapNetworkDrive
		If objFSO.FileExists(envSystem32 & "\explorer.exe") Then
			sCmd = envSystem32 & "\explorer.exe"
			objShell.Run sCmd
			MsgBox "Map Network Drive from the Tools menu of Explorer",64,MsgBoxTitle
		Else
			MsgBox "Cannot find " & envSystem32 & "\explorer.exe" & vbCrLf & "" & vbCrLf & _
			"Microsoft DaRT Tools may not be installed" & vbCrLf & "" & vbCrLf & _
			"Map Network Drive from a CMD Prompt and the Net Use command",16,MsgBoxTitle
		End If
	End Sub
'==================================================================================================
	Sub subPowerShell
		If objFSO.FileExists(envSystem32 & "\WindowsPowerShell\v1.0\powershell.exe") Then
			sCmd = envSystem32 & "\WindowsPowerShell\v1.0\powershell.exe"
			objShell.Run sCmd
		Else
			MsgBox "Cannot find " & envSystem32 & "\WindowsPowerShell\v1.0\powershell.exe" & vbCrLf & "" & vbCrLf & _
			"ADK Optional Component WinPE-PowerShell3 must be installed before using this feature",16,MsgBoxTitle
		End If
	End Sub
'==================================================================================================
	Sub subNotepad
		If objFSO.FileExists(envSystem32 & "\notepad.exe") Then
			sCmd = envSystem32 & "\notepad.exe"
			objShell.Run sCmd
		Else
			MsgBox "Cannot find " & envSystem32 & "\notepad.exe" & vbCrLf & "" & vbCrLf & _
			"Notepad may not be installed",16,MsgBoxTitle
		End If
	End Sub
'==================================================================================================
	Sub subRegedit
	On Error Resume Next		
	If objFSO.FileExists(envSystemRoot & "\regedit.exe") Then
			sCmd = envSystemRoot & "\regedit.exe"
			objShell.Run sCmd
		Else
			MsgBox "Cannot find " & envSystemRoot & "\regedit.exe" & vbCrLf & "" & vbCrLf & _
			"Regedit may not be installed",16,MsgBoxTitle
		End If
	End Sub
'==================================================================================================